10 GRAPH
15 PRINT "Hello!"
20 X=0:Y=0
30 BOX X,Y,X+20,Y+20,1,1
40 LET K=ASC(INKEY$)
45 BOX X,Y,X+20,Y+20,1,0
50 IF K=20 AND Y>0  THEN  Y=Y-1
60 IF K=21 AND Y<70 THEN  Y=Y+1
70 IF K=23 AND X>0  THEN  X=X-1
80 IF K=22 AND X<150 THEN X=X+1
90 IF K=ASC("q") THEN END
100 GOTO 30
